Developer CD Series 2000 August: Tool Chest/Dev.CD Aug 00 TC Disk 1.toast/pc/tool chest/development kits/hypercard related/xcmds & xfcns/apple event xcmds 1.0b3/apple event xcmds b3/background_6588.xml

Extensible Markup Language | 1993-04-14 | 8.8 KB | 264 lines

<?xml version="1.0" encoding="utf-8" ?>
<!DOCTYPE background PUBLIC "-//Apple, Inc.//DTD background V 2.0//EN" "" >
<background>
    <id>6588</id>
    <filler1>0</filler1>
    <bitmap>BMAP_5101.pbm</bitmap>
    <cantDelete> <false /> </cantDelete>
    <showPict> <true /> </showPict>
    <dontSearch> <false /> </dontSearch>
    <link rel="stylesheet" type="text/css" href="stylesheet_3179.css" />
    <part>
        <id>1</id>
        <type>field</type>
        <visible> <true /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <false /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>10</left>
            <top>59</top>
            <right>502</right>
            <bottom>285</bottom>
        </rect>
        <style>scrolling</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Helvetica</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <textHeight>16</textHeight>
        <name>info</name>
        <script></script>
    </part>
    <part>
        <id>5</id>
        <type>button</type>
        <visible> <true /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>130</left>
            <top>295</top>
            <right>196</right>
            <bottom>341</bottom>
        </rect>
        <style>transparent</style>
        <showName> <true /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <true /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>26235</icon>
        <textAlign>center</textAlign>
        <font>Chicago</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>About XCMDs</name>
        <script>On MouseWithin
ShowBalloon "Click here for information about the XCMDs, XFCNs and HyperTalk Handlers" ¬
& " that you can use with Apple Events."
End MouseWithin

on mouseUp
visual dissolve
go to card id 7137
end mouseUp

</script>
    </part>
    <part>
        <id>8</id>
        <type>button</type>
        <visible> <true /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>431</left>
            <top>295</top>
            <right>504</right>
            <bottom>342</bottom>
        </rect>
        <style>transparent</style>
        <showName> <true /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <true /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>25875</icon>
        <textAlign>center</textAlign>
        <font>Chicago</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>Æ Applications</name>
        <script>On MouseWithin
ShowBalloon "Click here to view a list of applications which you can" ¬
& " send Apple Events to."
End MouseWithin

on mouseUp
visual dissolve
go to card id 8694
end mouseUp

</script>
    </part>
    <part>
        <id>9</id>
        <type>button</type>
        <visible> <true /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>0</left>
            <top>294</top>
            <right>60</right>
            <bottom>342</bottom>
        </rect>
        <style>transparent</style>
        <showName> <true /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <true /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>6575</icon>
        <textAlign>center</textAlign>
        <font>Chicago</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>Stack Info</name>
        <script>On MouseWithin
ShowBalloon "Click here to see a general introduction to this stack."
End MouseWithin

on mouseUp
visual dissolve
go to card id 6659
end mouseUp

</script>
    </part>
    <part>
        <id>10</id>
        <type>button</type>
        <visible> <true /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>200</left>
            <top>295</top>
            <right>292</right>
            <bottom>341</bottom>
        </rect>
        <style>transparent</style>
        <showName> <true /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <true /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>13784</icon>
        <textAlign>center</textAlign>
        <font>Chicago</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>About Glue Routines</name>
        <script>On MouseWithin
ShowBalloon "Click here to see how to use appliction specific handlers to talk to" ¬
& "Apple Event aware applications."
End MouseWithin

on mouseUp
visual dissolve
go to card id 7628
end mouseUp

</script>
    </part>
    <part>
        <id>12</id>
        <type>field</type>
        <visible> <true /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <false /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>5</left>
            <top>22</top>
            <right>346</right>
            <bottom>46</bottom>
        </rect>
        <style>transparent</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Helvetica</font>
        <textSize>24</textSize>
        <textStyle>outline</textStyle>
        <textHeight>32</textHeight>
        <name></name>
        <script></script>
    </part>
    <part>
        <id>13</id>
        <type>button</type>
        <visible> <true /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>64</left>
            <top>296</top>
            <right>126</right>
            <bottom>341</bottom>
        </rect>
        <style>transparent</style>
        <showName> <true /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <true /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>24694</icon>
        <textAlign>center</textAlign>
        <font>Chicago</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>Instructions</name>
        <script>On MouseWithin
ShowBalloon "Click here for information about how to genering glue routines and how try out the Apple" ¬
& " events supported by Apple Event aware applications."
End MouseWithin

on mouseUp
visual dissolve
go to card id 8036
end mouseUp

</script>
    </part>
    <part>
        <id>14</id>
        <type>button</type>
        <visible> <true /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>396</left>
            <top>36</top>
            <right>499</right>
            <bottom>56</bottom>
        </rect>
        <style>shadow</style>
        <showName> <true /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <true /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Helvetica</font>
        <textSize>12</textSize>
        <textStyle>bold</textStyle>
        <name>Print this Field</name>
        <script>On MouseWithin
ShowBalloon "Click here to print the information contained in the field below."
End MouseWithin

on mouseUp
print fld "info"
end mouseUp</script>
    </part>
    <name></name>
    <script>on openStack
if the screenRect is "0,0,512,342" then set the loc of cd window to "0,0"
if the userLevel < 5 then set the userLevel to 5
if the systemVersion < "7.0" then -- Systems < 7.0 don't support Apple Events.
answer "You must be running System 7.0 or later to send Apple Events™"¬
&&"from this stack."
end if
if the version < "2.1" then -- HyperCard < 2.1 doesn't support Apple Events.
answer "HyperCard version 2.1 or later is required to use this stack."
end if
end openStack

on closeStack
if the freesize of this stack > 32768 then
get there is a menuItem "Compact Stack" of menu "File"
if it then doMenu "Compact Stack"
end if
pass closeStack
end closeStack

on resumeStack
if the userLevel < 5 then set the userLevel to 5
end resumeStack

on go
HMRemoveBalloon -- Removes any vestigal balloons which may have
pass go                          -- left from the "ShowBalloon" XCMD.
end go

</script>
</background>